Составить программу для вычисления длины окружности, площади круга, и обЪема шара одинаково радиуса- PureBasic(Бейсик)

1
2
3
4
5
6
7
8
9
10
11
12
cls
dim R
dim L
dim S
dim V
input R
L = 2*3.14*R
S = 2*3.14*R*R
V = 2*3.14*R*R*R
print L
print S
print V

Следующий вариант

1
2
3
4
5
6
input "Введите радиус", R
L = 2*3.14*R
S = 2*3.14*R*R
V = 2*3.14*R*R*R
print "Длина: ";L;" Площадь: ";S;" Объем: ";V
end

Leave a Comment